unit uRelRecebimentosDia;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, uReportDatamodule, cxGraphics, cxControls, cxLookAndFeels,
  cxLookAndFeelPainters, cxContainer, cxEdit, dxSkinsCore, dxSkinBlack,
  dxSkinBlue, dxSkinOffice2007Black, dxSkinOffice2007Blue,
  dxSkinOffice2007Green, dxSkinOffice2007Pink, dxSkinOffice2007Silver,
  dxSkinOffice2010Black, dxSkinOffice2010Blue, dxSkinOffice2010Silver, StdCtrls,
  Buttons, cxTextEdit, cxMaskEdit, cxDropDownEdit, cxCalendar;

type
  TForm3 = class(TForm)
    lbl37: TLabel;
    cxDateEdit1: TcxDateEdit;
    lbl_Data: TLabel;
    cxDateEdit2: TcxDateEdit;
    Label1: TLabel;
    btnOpen: TBitBtn;
    procedure btnOpenClick(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form3: TForm3;

implementation

{$R *.dfm}

procedure TForm3.btnOpenClick(Sender: TObject);
begin
  dmreport := Tdmreport.Create(Application);
  dmreport.loadRecebimentosDia;
  dmreport.frxrprtRecebimentoDia.ShowReport;
end;

end.
